10 REM VOCABULARY EXERCISE DESIGNED BY         BILL CUMBERLAND FEB 1989
15 POKE53280,0:POKE53281,0:POKE646,7:POKE53272,23
20 V$="5":REM MODULE IDENTIFICATION CODE
25 REM THIS MODULE WAS PREPARED BY ....
30 REM BILL CUMBERLAND - 1991:10:27
100 PRINT"[147]                                        [146]";
101 PRINT"                                        [146]";
102 PRINT"                [214][207][195][193][194] "V$"              [146]";
104 PRINT"                                           [146]";
105 PRINT"                                        [146]";
106 PRINT"                                        [146]";
107 PRINT"                                        [146]"
108 GOSUB9051:GOSUB9300:GOSUB660
110 PRINT"[147]                                        [146]";
111 PRINT"    [212]HIS MODULE WAS PREPARED BY....     [146]";
112 PRINT"            [194]ILL [195]UMBERLAND             [146]";
113 PRINT"               91:10:27                 [146]";
114 PRINT"                                        [146]":GOSUB9052
115 PRINT"[147]   [212]HE FOLLOWING WORDS ARE EXAMINED:"
120 PRINT"HERBACEOUS,SUCCULENTS,HOPPER,DORMANT"
125 PRINT" HYBRIDS,TOPIARY,ESPALIERING,TENDRILS"
130 PRINT" AROMATIC,DIBBLE,LOAM,SPORES"
135 PRINT"TILTH,SCION,PERGOLA,HONED"
140 PRINT"FRIABLE,POROSITY,OVATE,ARBORETUM"
145 PRINT"          [201]NSTRUCTIONS?  Y/N":GOSUB9051:GOSUB9300
150 GETR$:IFR$<>"Y"ANDR$<>"N"THEN150
155 IFR$="N"THEN2000
200 PRINT"[147]             [201]NSTRUCTIONS
210 [153]"  (null)HIS IS ONE OF A SERIES OF MODULES      DESIGNED TO HELP YOU ";
220 [153]"BUILD A GOOD       WORKING VOCABULARY.
230 GOSUB9054
240 PRINT"[147]  [210]EAD THE UNDERLINED WORD AND CHOOSE     ONE OF THE FIVE WORDS ";
250 PRINT"WHICH HAS A       MEANING SIMILAR TO THE UNDERLINED       WORD.
260 [153]"  VALXAMPLE:    MIDDLE
270 PRINT"              [183][183][183][183][183][183]
280 [153]"           1. WARFARE
290 PRINT"           2. MARCHED
300 [153]"           3. LAWFUL
310 PRINT"           4. CENTRE
320 [153]"           5. RANCH
330 PRINT"  [211]INCE 'CENTRE' IS THE CORRECT CHOICE,   YOU WOULD ENTER '4'";
340 PRINT" AS YOUR RESPONSE    AND THEN PRESS [210][197][212][213][210][206][146]
350 [141]50
370 [153]"LOAD  (null)RESS 1 TO REVIEW INSTRUCTIONS.
380 PRINT"  [208]RESS 2 TO START THE EXERCISE.
390 [161]R$:[139]R$[179][177]"1"[175]R$[179][177]"2"[167]390
400 [139]R$[178]"1"[167]200
410 [153]"LOAD  LEFT$ERE ARE TWENTY QUESTIONS FOR YOU.
420 GOSUB9052:PRINT"[147]"
430 W=1
440 GOTO2000
499 :
500 REM TERMINATION OF MODULE
505 IF C>18 THEN 535
510 IF C>16 THEN 570
515 IF C>14 THEN 595
520 PRINT"[147]  [217]OU SEEM TO HAVE PROBLEMS!
525 [153]"  (null)EE YOUR TEACHER!"
530 [141]9059:[137]540
535 [153]"LOAD   VALXCELLENT WORK!":[141]9052
540 [153]"   STR$O YOU WISH TO REVIEW THE DEFINITIONS   OF THESE WORDS?  Y/N
545 GETR$:IFR$<>"Y"ANDR$<>"N"THEN545
550 IFR$="Y"THEN5000
555 IFR$="N"THENPRINT"[147]  [212]RY MODULE [214][207][195][193][194] 3 WHEN YOU HAVE        THE TIME.
560 [141]9052:[137]9500
570 [153]"LOAD   CHR$OOD WORK!":[141]9052:[153]"   (null)OU MISSED"[197](W$)"WORDS"
575 [141]9055
580 [153]"   (null)ET'S REVIEW THE DEFINITIONS OF         THESE WORDS?
585 GOSUB9053:GOTO5000
590 GOSUB9055
595 PRINT"[147]  [217]OU ARE NOT DOING VERY WELL!":GOSUB9054
600 PRINT"  [201] WANT YOU TO REVIEW THE MEANING OF     THESE WORDS NOW."
605 GOSUB9053:PRINT"  [208]RESS  [211][208][193][195][197] [146] TO CONTINUE.
610 [161]R$:[139]R$[179][177][199](32)[167]610
615 [137]5000
654 :
655 [141]9054
660 [153]"      (null)RESS  (null)(null)ATNLENVAL WAIT TO CONTINUE.
665 GETR$:IFR$<>CHR$(32)THEN665
670 RETURN
1999 :
2000 PRINT"[147]":POKE53280,9:POKE53281,15:POKE646,0
2010 PRINT" 1       HERBACEOUS
2015 [153]"         USRUSRUSRUSRUSRUSRUSRUSRUSRUSR
2020 PRINT"      1. FATAL TO HERBS
2025 [153]"      2. RESEMBLING A PLANT LEAF
2030 PRINT"      3. POLLINATED
2035 [153]"      4. ABUNDANT
2040 PRINT"      5. DRAINAGE
2045 [141]9000
2050 [139]R$[178]"2"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2100
2060 [141]9200
2065 [153]"  (null)O, THE CORRECT CHOICE IS...
2070 PRINT"         RESEMBLING A PLANT LEAF [146].":W=W+1
2075 GOSUB9052
2080 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2099 :
2100 PRINT"[147]":POKE53280,8:POKE53281,15:POKE646,0
2110 PRINT" 2       SUCCULENTS
2115 [153]"         USRUSRUSRUSRUSRUSRUSRUSRUSRUSR
2120 PRINT"      1. SHOWY BLOOMS
2125 [153]"      2. IRRIGATED FIELDS
2130 PRINT"      3. PLANTS HAVING JUICY TISSUES
2135 [153]"      4. OVERDEVELOPED ROOTS
2140 PRINT"      5. SWEET
2145 [141]9000
2150 [139]R$[178]"3"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2200
2155 [141]9200
2160 [153]"  (null)O, THE CORRECT CHOICE IS ...
2165 PRINT"   PLANTS HAVING FLESHY JUICY TISSUE ":W=W+1
2170 GOSUB9052
2175 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2199 :
2200 PRINT"[147]":POKE53280,5:POKE53281,15:POKE646,0
2210 PRINT" 3       HOPPER
2215 [153]"         USRUSRUSRUSRUSRUSR
2220 PRINT"      1. HOME-BREWED BEER
2225 [153]"      2. UNWANTED VINE
2230 PRINT"      3. HOE
2235 [153]"      4. RABBIT-LIKE
2240 PRINT"      5. RECEPTIVAL FOR DISPENSING               CONTENTS EVENLY
2245 [141]9000
2250 [139]R$[178]"5"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2300
2255 [141]9200
2260 [153]"  (null)O, THE CORRECT CHOICE IS ...
2265 PRINT"   RECEPTICAL FOR DISPENSING [146]":W=W+1
2270 GOSUB9052
2275 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2299 :
2300 PRINT"[147]":POKE53280,3:POKE53281,15:POKE646,0
2310 PRINT" 4       DORMANT
2315 [153]"         USRUSRUSRUSRUSRUSRUSR
2320 PRINT"      1. INACTIVE
2325 [153]"      2. FLOURISHING
2330 PRINT"      3. FESTOONING A DOORWAY
2335 [153]"      4. INFESTED
2340 PRINT"      5. SUMMERHOUSE ROOF
2345 [141]9000
2350 [139]R$[178]"1"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2400
2355 [141]9200
2360 [153]"  (null)O, THE CORRECT CHOICE IS ...
2365 PRINT"         INACTIVE [146]":W=W+1
2370 GOSUB9052
2375 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2399 :
2400 PRINT"[147]":POKE53280,3:POKE53281,15:POKE646,0
2410 PRINT" 5       HYBRIDS
2415 [153]"         USRUSRUSRUSRUSRUSRUSR
2420 PRINT"      1. PESTICIDES
2425 [153]"      2. ACIDIC SOIL
2430 PRINT"      3. GARDEN PATHS
2435 [153]"      4. TINY, HELPFUL INSECT
2440 PRINT"      5. PLANTS PRODUCED BY COMBINING            TWO SPECIES.
2445 [141]9000
2450 [139]R$[178]"5"[167] [141]9100:[153]"         LENORRECT!":[141]9052:[137]2500
2455 [141]9200
2460 [153]"  (null)O, THE CORRECT CHOICE IS ...
2465 PRINT"PLANTS PRODUCED BY COMBINING TWO SPECIES[146]":W=W+1
2470 GOSUB9052
2475 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2499 :
2500 PRINT"[147]":POKE53280,7:POKE53281,15:POKE646,0
2510 PRINT" 6       TOPIARY
2515 [153]"         USRUSRUSRUSRUSRUSRUSR
2520 PRINT"      1. WEEDY GRASS
2525 [153]"      2. GIVING TREES OR SHRUBS                  ORNAMENTAL SHAPES
2530 PRINT"      3. ICE DEPOSITS
2535 [153]"      4. TOP-HEAVY SHRUBS
2540 PRINT"      5. MAP OF A FLOWER GARDEN
2545 [141]9000
2550 [139]R$[178]"2"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2600
2555 [141]9200
2560 [153]"  (null)O, THE CORRECT CHOICE IS ...
2565 PRINT"GIVING TREES OR SHRUBS ORNAMENTAL SHAPES":W=W+1
2570 GOSUB9052
2575 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2599 :
2600 PRINT"[147]":POKE53280,2:POKE53281,15:POKE646,0
2610 PRINT" 7       TENDRILS
2615 [153]"         USRUSRUSRUSRUSRUSRUSRUSR
2620 PRINT"      1. SEGMENTS OF BANNA PEEL
2625 [153]"      2. PEBBLES
2630 PRINT"      3. DEWDROPS
2635 [153]"      4. THREADLIKE PART OF CLIMBING             PLANT
2640 PRINT"      5. FARM WAGON USED TO HAUL                 MANURE
2645 [141]9000
2650 [139]R$[178]"4"[167] [141]9100:[153]"         LENORRECT!":[141]9052:[137]2700
2655 [141]9200
2660 [153]"  (null)O, THE CORRECT CHOICE IS ...
2665 PRINT" THREADLIKE PART OF A CLIBING PLANT ":W=W+1
2670 GOSUB9052
2675 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2699 :
2700 PRINT"[147]":POKE53280,11:POKE53281,15:POKE646,0
2710 PRINT" 8       ESPALIERING
2715 [153]"         USRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSR
2720 PRINT"        1. SETTING COMPATIBLE PLANTS               TOGETHER
2725 [153]"        2. DRAINING SOIL
2730 PRINT"        3. POISONING ROOTS
2735 [153]"        4. GROWING HYDROPONIC TOMATOES
2740 PRINT"        5. TRAINING SHRUBS TO GROW FLAT            AGAINST A SUPPORT
2745 [141]9000
2750 [139]R$[178]"5"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2800
2755 [141]9200
2760 [153]"  (null)O, THE CORRECT CHOICE IS ...
2765 PRINT"TRAINING SHRUBS TO GROW FLAT ON SUPPORTS":W=W+1
2770 GOSUB9052
2775 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2799 :
2800 PRINT"[147]":POKE53280,10:POKE53281,15:POKE646,0
2810 PRINT" 9       AROMATIC
2815 [153]"         USRUSRUSRUSRUSRUSRUSRUSR
2820 PRINT"      1. PRICKLY
2825 [153]"      2. SHUNNING THE SUNLIGHT
2830 PRINT"      3. HAVING A PLEASING ODOUR
2835 [153]"      4. VIVIDLY COLOURED
2840 PRINT"      5. HANGING FROM VINES
2845 [141]9000
2850 [139]R$[178]"3"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]2900
2855 [141]9200
2860 [153]"  (null)O, THE CORRECT CHOICE IS ...
2865 PRINT"    HAVING A PLEASING ODOUR [146]":W=W+1
2870 GOSUB9052
2875 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2899 :
2900 PRINT"[147]":POKE53280,5:POKE53281,15:POKE646,0
2910 PRINT" 10      DIBBLE
2915 [153]"         USRUSRUSRUSRUSRUSR
2920 PRINT"      1. IMPLEMENT FOR MAKING HOLES              IN THE EARTH
2925 [153]"      2. BARK EATING INSECT
2930 PRINT"      3. LIGHT AND FLUFFY COMPOST                MATERIAL
2935 [153]"      4. FERTILIZER
2940 PRINT"      5. SCANT BLOOM
2945 [141]9000
2950 [139]R$[178]"1"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3000
2955 [141]9200
2960 [153]"  (null)O, THE CORRECT CHOICE IS ...
2965 PRINT"IMPLEMENT FOR MAKING HOLES IN THE EARTH":W=W+1
2970 GOSUB9052
2975 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
2999 :
3000 PRINT"[147]":POKE53280,12:POKE53281,15:POKE646,0
3010 PRINT" 11      LOAM
3015 [153]"         USRUSRUSRUSR
3020 PRINT"      1. RICH SOIL
3025 [153]"      2. POOR SOIL
3030 PRINT"      3. SCAB ON A GRAPE
3035 [153]"      4. ATMOSPHERE LOW IN OXYGEN
3040 PRINT"      5. ROCKY GROUND
3045 [141]9000
3050 [139]R$[178]"1"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3100
3055 [141]9200
3060 [153]"  (null)O, THE CORRECT CHOICE IS ...
3065 PRINT"         RICH SOIL [146]":W=W+1
3070 GOSUB9052
3075 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053 :GOSUB9060
3099 :
3100 PRINT"[147]":POKE53280,10:POKE53281,15:POKE646,0
3110 PRINT" 12      SPORES
3115 [153]"         USRUSRUSRUSRUSRUSR
3120 PRINT"      1. SAWTOOTH LEAVES
3125 [153]"      2. MINUTE REPRODUCTIVE ORGANISMS
3130 PRINT"      3. SCENTLESS FLOWERS
3135 [153]"      4. TOXIC BERRIES
3140 PRINT"      5. SCABS ON APPLES CAUSED BY               WORMS
3145 [141]9000
3150 [139]R$[178]"2"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3200
3155 [141]9200
3160 [153]"  (null)O, THE CORRECT CHOICE IS ...
3165 PRINT"     MINUTE REPRODUCTIVE ORGANISMS [146]":W=W+1
3170 GOSUB9052
3175 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
3199 :
3200 PRINT"[147]":POKE53280,4:POKE53281,15:POKE646,0
3210 PRINT" 13      TILTH
3215 [153]"         USRUSRUSRUSRUSR
3220 PRINT"      1. ROCKY TERRAIN
3225 [153]"      2. SOIL PREPARED FOR PLANTING
3230 PRINT"      3. LACK OF FOLIAGE
3235 [153]"      4. SAND TREATED WITH MANURE
3240 PRINT"      5. SAND USED DECORATIVELY
3245 [141]9000
3250 [139]R$[178]"2"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3300
3255 [141]9200
3260 [153]"  (null)O, THE CORRECT CHOICE IS ...
3265 PRINT"   SOIL PREPARED FOR PLANTING [146]":W=W+1
3270 GOSUB9052
3275 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
3299 :
3300 PRINT"[147]":POKE53280,3:POKE53281,15:POKE646,0
3310 PRINT" 14      SCION
3315 [153]"         USRUSRUSRUSRUSR
3320 PRINT"      1. SPADE FOR DIGGING CLAY
3325 [153]"      2. BLIGHT
3330 PRINT"      3. SHOOT OR TWIG OF A PLANT
3335 [153]"      4. GARDENER'S BACKACHE
3340 PRINT"      5. TROPICAL FUNGUS
3345 [141]9000
3350 [139]R$[178]"3"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3400
3355 [141]9200
3360 [153]"  (null)O, THE CORRECT CHOICE IS ...
3365 PRINT"   SHOOT OR TWIG OF A PLANT [146]":W=W+1
3370 GOSUB9052
3375 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
3399 :
3400 PRINT"[147]":POKE53280,13:POKE53281,15:POKE646,0
3410 PRINT" 15      PERGOLA
3415 [153]"         USRUSRUSRUSRUSRUSRUSR
3420 PRINT"      1. OPEN-WORKED ARCH FOR CLIMBING           PLANTS
3425 [153]"      2. POND FOR WATER PLANTS
3430 PRINT"      3. COFFEE BEAN
3435 [153]"      4. ROOT CELLAR
3440 PRINT"      5. BUCKET
3445 [141]9000
3450 [139]R$[178]"1"[167] [141]9100:[153]"      LENORRECT!":[141]9052:[137]3500
3455 [141]9200
3460 [153]"  (null)O, THE CORRECT CHOICE IS ...
3465 PRINT" OPEN-WORKED ARCH FOR CLIMBING PLANTS ":W=W+1
3470 GOSUB9052
3475 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
3480 PRINT"  [198]ROM [204]ATIN 'PROPAGARE'":GOSUB9060
3500 PRINT"[147]":POKE53280,7:POKE53281,15:POKE646,0
3510 PRINT" 16      HONED
3515 [153]"         USRUSRUSRUSRUSR
3520 PRINT"      1. FROST-DAMAGED
3525 [153]"      2. STORED IN A WELL
3530 PRINT"      3. SHARPENED
3535 [153]"      4. TRIMMED
3540 PRINT"      5. REFINED HONEY
3545 [141]9000
3550 [139]R$[178]"3"[167] [141]9100:[153]"         LENORRECT!":[141]9052:[137]3600
3555 [141]9200
3560 [153]"  (null)O, THE CORRECT CHOICE IS ...
3565 PRINT"         SHARPENED  [146]"
3570 GOSUB9052:W=W+1
3575 PRINT"  [211]TOP AND MAKE A NOTE OF THIS.":GOSUB9053:GOSUB9060
3585 GOSUB9060
3600 PRINT"[147]":POKE53280,13:POKE53281,15:POKE646,0
3610 PRINT" 17      FRIABLE
3615 [153]"         USRUSRUSRUSRUSRUSRUSR
3620 PRINT"      1. PRONE TO ROT QUICKLY
3625 [153]"      2. EASILY SUN-SCORCHED
3630 PRINT"      3. EASILY CRUMBLED
3635 [153]"      4. UNSAFE AS FOOD
3640 PRINT"      5. CAN BE COOKED IN A FRYING PAN"
3645 GOSUB9000
3650 IFR$="3"THEN GOSUB9100:PRINT"      [195]ORRECT!":GOSUB9052:GOTO3700
3655 GOSUB9200
3660 PRINT"  [206]O, THE CORRECT CHOICE IS ...
3665 [153]"      EASILY CRUMBLED WAIT":W[178]W[170]1
3670 [141]9052
3675 [153]"  (null)TOP AND MAKE A NOTE OF THIS.":[141]9053:[141]9060
3700 [153]"LOAD":[151]53280,3:[151]53281,15:[151]646,0
3710 [153]" 18      POROSITY
3715 PRINT"         [183][183][183][183][183][183][183][183]
3720 [153]"      1. CLEANLINESS
3725 PRINT"      2. SCARCITY
3730 [153]"      3. SWEATY
3735 PRINT"      4. ABILITY TO ABSORB MOISTURE
3740 [153]"      5. STATE OF OVERDEVELOPMENT
3745 GOSUB9000
3750 IFR$="4"THEN GOSUB9100:PRINT"      [195]ORRECT!":GOSUB9052:GOTO3800
3755 GOSUB9200
3760 PRINT"  [206]O, THE CORRECT CHOICE IS ...
3765 [153]"      ABILITY TO ABSORB MOISTURE WAIT":W[178]W[170]1
3770 [141]9052
3775 [153]"  (null)TOP AND MAKE A NOTE OF THIS.":[141]9053:[141]9060
3800 [153]"LOAD":[151]53280,10:[151]53281,15:[151]646,0
3810 [153]" 19      OVATE
3815 PRINT"         [183][183][183][183][183]
3820 [153]"      1. EIGHT-PETALLEDENS
3825 PRINT"      2. ATTRACTIVE TO INSECTS
3830 [153]"      3. REQUIRING MUCH WATER
3835 PRINT"      4. EGG-SHAPED
3840 [153]"      5. BEING FERTILE
3845 GOSUB9000
3850 IFR$="4"THEN GOSUB9100:PRINT"      [195]ORRECT!":GOSUB9052:GOTO3900
3855 GOSUB9200
3860 PRINT"  [206]O, THE CORRECT CHOICE IS ...
3865 [153]"         EGG-SHAPED WAIT":W[178]W[170]1
3870 [141]9052
3875 [153]"  (null)TOP AND MAKE A NOTE OF THIS.":[141]9053:[141]9060
3900 [153]"LOAD":[151]53280,7:[151]53281,15:[151]646,0
3910 [153]" 20      ARBORETUM
3915 PRINT"         [183][183][183][183][183][183][183][183][183]
3920 [153]"      1. TYPE OF FUNGUS FOUND ON ROSES
3925 PRINT"      2. PLACE WHERE TREES AND SHRUBS            ARE GROWN TO STUDY
3930 [153]"      3. TREE WITH MASSIVE ROOT SYSTEM
3935 PRINT"      4. ARCH OVER A FISH POND
3940 [153]"      5. WOOD WORKING SHOP
3955 GOSUB9000
3960 IFR$="2"THEN GOSUB9100:PRINT"      [195]ORRECT!":GOSUB9052:GOTO4500
3965 GOSUB9200
3970 PRINT"  [206]O, THE CORRECT CHOICE IS ...
3975 [153]" PLACE WHER SHRUBS AND TREES ARE GROWN WAIT":W[178]W[170]1:[141]9052:[141]9060
4500 [153]"LOAD":[151]53280,0:[151]53281,0:[151]646,1:C[178]20[171]W
4505 [153]"  (null)OU HAVE COMPLETED THIS MODULE AND
4510 PRINT"  GOT";C;"WORDS CORRECT.":GOSUB9055
4515 GOTO500
4999 :
5000 PRINT"[147]":POKE53280,12:POKE53281,12:POKE646,0
5005 PRINT"              [196][197][198][201][206][201][212][201][207][206][211] [146]
5100 [153]" 1.  LEFT$VAL(null)PEEKATNLENVAL(null)(null)(null)
5110 PRINT"     [210]ESEMBLING A PLANT LEAF IN COLOUR,
5120 [153]"     TEXTURE AND SHAPE.
5130 PRINT" * [204]ATIN 'HERBACEUS' (GRASSY)
5140 [141]9070
5200 [153]"LOAD 2.  (null)(null)LENLEN(null)(null)VAL(null)(null)(null)
5210 PRINT"     [208]LANTS HAVING FLESHY, JUICY
5220 [153]"     TISSUE FOR STORING WATER.
5230 PRINT" * [204]ATIN 'SUCCUS'  (JUICE) "
5240 GOSUB9070
5300 PRINT"[147] 3.  [200][207][208][208][197][210]
5310 [153]"     (null)ECEPTICAL FOR DISPENSING
5320 PRINT"     CONTENTS EVENLY
5340 [153]" * (null)IDDLE VALNGLISH 'HOPPEN' (TO HOP) "
5350 [141]9070
5400 [153]"LOAD 4.  STR$(null)(null)(null)ATN(null)(null)
5410 PRINT"     [211]LEEPING; HYBERNATING;QUIESCENT
5420 [153]"
5430 PRINT" * [204]ATIN 'DORMIRE'  (TO SLEEP)
5440 [141]9070
5500 [153]"LOAD 5.  LEFT$(null)PEEK(null)RIGHT$STR$(null)
5510 PRINT"     [208]LANTS PRODUCED BY COMBINING TWO
5520 [153]"     SPECIES OR VARIETIES.
5530 PRINT" * [204]ATIN 'HYBRIDA' (OFFSPRING OF MIXED     ORIGIN.
5540 [141]9070
5600 [153]"LOAD 6.  (null)(null)(null)RIGHT$ATN(null)(null)
5610 PRINT"     [199]IVING TREES OR SHRUBS ORNAMENTAL
5620 [153]"     SHAPES BY MEANS OF TRIMMING AND         TRAINING,
5630 PRINT" * [204]ATIN 'TOPIA' (ORNAMENTAL GARDENING)
5640 [141]9070
5700 [153]"LOAD 7.  VAL(null)(null)ATN(null)RIGHT$VAL(null)RIGHT$(null)CHR$
5710 PRINT"     [212]HE PRACTICE OF TRAING A TREE OR
5720 [153]"     SHRUB TO GROW FLAT AGAINST A            SUPPORT.
5730 PRINT"   * [204]ATIN 'SPATULA' (SHOULDER BLADE)
5740 [141]9070
5800 [153]"LOAD 8.  (null)VAL(null)STR$(null)RIGHT$(null)(null)
5810 PRINT"     [212]HREADLIKE PARTS OF CLIMBING
5820 [153]"     PLANTS"
5830 [153]"   * (null)ATIN  'TENER'  (TENDER)
5840 GOSUB9070
5900 PRINT"[147] 9.  [193][210][207][205][193][212][201][195]
5905 [153]"     LEFT$AVING A DISTINCTIVE PLEASING
5910 PRINT"     ODOUR. "
5915 PRINT"   * [199]REEK  'AROMA'  (SPICE)
5920 [141]9070
5950 [153]"LOAD 10. STR$RIGHT$PEEKPEEK(null)VAL
5955 PRINT"     [211]MALL HAND IMPLEMENT TO MAKE
5960 [153]"     HOLES IN THE GROUND FOR                 PLANTING.
5965 PRINT"   * [205]IDDLE [197]NGLISH 'DEBYLLE'
5970 [141]9070
6000 [153]"LOAD 11. (null)(null)ATN(null)
6010 PRINT"     [210]ICH, DARK SOIL.                                  ;
6040 [153]"   * (null)LD VALNGLISH  'LAM'  (CLAY)
6050 GOSUB9070
6100 PRINT"[147] 12. [211][208][207][210][197][211]
6110 [153]"     (null)INUTE REPRODUCTIVE ORGANISMS
6120 PRINT"     SIMILAR IN FUNCTION TO THE SEEDS        OF FLOWERING PLANTS.
6130 [153]"   * CHR$REEK  'SPORA' (THE ACT OF SOWING       SEED
6140 GOSUB9070
6200 PRINT"[147] 13. [212][201][204][212][200]
6210 [153]"     (null)URFACE SOIL PREPARED FOR"
6220 [153]"     PLANTING"
6230 [153]"   * (null)LD VALNGLISH  'TILIAN' TO TILL"
6240 [141]9070
6300 [153]"LOAD 14. (null)LENRIGHT$(null)(null)
6310 PRINT"     [193] SHOOT OR TWIG OF A PLANT
6320 [153]"     ESPECIALLY ONE USED FOR GRAFTING        OR PLANTING.
6330 PRINT"   * [207]LD [198]RENCH 'CION' (SHOOT OR TWIG)
6340 [141]9070
6400 [153]"LOAD 15. (null)VAL(null)CHR$(null)(null)ATN
6410 PRINT"     [207]PEN-WORKED ARCH OVER WHICH
6420 [153]"     CLIMBING PLANTS ARE TRAINED.
6430 PRINT"   * [204]ATIN 'PERGULA' (ROOF OR ARBOUR)
6440 [141]9070
6500 [153]"LOAD 16. LEFT$(null)(null)VALSTR$
6510 PRINT"     [211]HARPENED AS WITH A HONE. "
6520 PRINT"     [A FINE-GRAINED HARD STONE]
6530 [153]"   * (null)LD VALNGLISH 'HAN' (STONE)
6550 GOSUB9070
6600 PRINT"[147] 17. [198][210][201][193][194][204][197]
6610 [153]"     VALASILY CRUMBLED, PULVERIZED,
6620 PRINT"     REDUCED TO A POWDER.
6630 [153]"   * (null)ATIN  'FRIARE'  (TO CRUMBLE)
6640 GOSUB9070
6700 PRINT"[147] 18. [208][207][210][207][211][201][212][217]
6710 [153]"     ATNBILITY TO ABSORB MOISTURE.
6730 PRINT"   * [204]ATIN 'POROSUS' (POROUS))
6740 [141]9070
6800 [153]"LOAD 19. (null)(null)ATN(null)VAL
6810 PRINT"     [197]GG-SHAPED
6830 [153]"   * (null)ATIN 'OVUM' (EGG)
6840 GOSUB9070
6900 PRINT"[147] 20. [193][210][194][207][210][197][212][213][205]
6910 [153]"     ATN PLACE WHERE TREES AND SHRUBS "
6920 [153]"     ARE GROWN FOR THE PURPOSE OF  "
6930 [153]"     STUDY.
6940 PRINT"   * [204]ATIN  'ARBOR'  (TREE)
6950 [141]9070
8500 [153]"LOAD":[151]53280,0:[151]53281,0:[151]646,7
8505 [139][197](W$)[179]3[167][137]8565
8515 [153]"              (null)ATN(null)(null)RIGHT$(null)CHR$ WAITSYS
8520 PRINT"   [201]F YOU MISSED MORE THAN TWO WORDS       YOU SHOULD REPEAT THIS";
8525 PRINT" MODULE."
8530 GOSUB 9052
8565 PRINT"[147]    [212]HE NEXT MODULE IN THIS SERIES IS                 [214][207][195][193][194] 6
8570 [141]9052
8575 [153]"    (null)EMEMBER....":[141]9051
8580 [153]"   RIGHT$F YOU KNOW THE WORDS - YOU CAN         COMMUNICATE!
8585 GOSUB9052
8590 PRINT"    [193] GOOD VOCABULARY IS WORTH [210][197][193][204]         GOLD!":GOSUB9059
8595 GOTO9500
9000 INPUT"    ";R$
9005 IFR$<>"1"ANDR$<>"2"ANDR$<>"3"ANDR$<>"4"ANDR$<>"5"THEN 9000
9010 RETURN
9050 REM TIME SELECTORS
9051 FORT=1TO1000:NEXT:RETURN
9052 FORT=1TO2000:NEXT:RETURN
9053 FORT=1TO3000:NEXT:RETURN
9054 FORT=1TO4000:NEXT:RETURN
9055 FORT=1TO5000:NEXT:RETURN
9059 FORT=1TO9000:NEXT:RETURN
9060 GOSUB 9052
9061 PRINT"  [208]RESS  [211][208][193][195][197] [146] TO CONTINUE.
9062 [161]R$:[139]R$[179][177][199](32)[167]9062
9063 [142]
9070 [141] 9052
9071 [153]"   (null)RESS  (null)(null)ATNLENVAL WAIT TO CONTINUE.
9072 GETR$:IFR$<>CHR$(32)THEN9072
9073 RETURN
9099 :
9100 REM 'YES' SOUND
9105 S=54272:FORS=STOS+28:POKEE,0:NEXT
9110 POKE54296,15:POKE54277,42:POKE54278,250
9115 POKE54276,23:POKE54273,23:POKE54272,191
9120 FORT=1TO100:NEXT:POKE54276,32:FORT=1TO200:NEXT
9125 POKE54296,0:RETURN
9199 :
9200 REM 'NO' SOUND
9205 S=54272:FORS=STOS+28:POKEE,0:NEXT
9210 POKE54296,15:POKE54277,18:POKE54278,242
9215 POKE54276,33:POKE54273,4:POKE54272,48
9220 FORT=1TO300:NEXT:POKE54276,32:FORT=1TO400:NEXT
9225 FORE=STOS+28:POKEE,0:NEXT:RETURN
9299 :
9300 REM 'BLIP' SOUND
9305 S=54272:FORL=STOS+28:POKEL,0:NEXT:POKES+5,14:POKES+9,240:POKES+24,15
9310 HF=S+1:LF=S
9315 POKES+4,17:POKEHF,INT(RND(0)*50):POKELF,250:POKES+4,16:RETURN
9500 PRINT"[147][153] [217]OU HAVE A CHOICE:
9510 [153]" (null)RESS  (null) WAIT TO REPEAT MODULE 5
9520 PRINT" [208]RESS  [205] [146] TO GO TO THE DISK MENU
9530 [161]R$:[139]R$[179][177]"R"[175]R$[179][177]"(null)"[175]R$[179][177]"M"[175]R$[179][177]"(null)"[167]9530
9540 [139]R$[178]"M"[167] [137]9560
9545 [139]R$[178]"(null)"[167] [137]9560
9550 [140]:[137]10
9560 [153]"LOAD(null)ETURNING TO THE DISK MENU
9570 LOAD"MENU",8
9580 RUN
9590 END
10000 REM  IN MEMORIUM * RAD JANJIC *              R.I.P.  87:11:26
10001 REM FOR CORRECTION OR IMPROVEMENTCONTACT BILL CUMBERLAND (416)278-7687